home *** CD-ROM | disk | FTP | other *** search
/ Delphi Magazine Collection 2001 / Delphi Magazine Collection 20001 (2001).iso / DISKS / Issue25 / compress / COMPRESS.ZIP / BMTESTF.DFM / BMTESTF.txt
Encoding:
Text File  |  1997-07-09  |  1.5 KB  |  75 lines
  1. object Form1: TForm1
  2.   Left = 286
  3.   Top = 111
  4.   Width = 323
  5.   Height = 248
  6.   Caption = 'Compressed Bitmaps from Resources'
  7.   Font.Color = clWindowText
  8.   Font.Height = -14
  9.   Font.Name = 'MS Sans Serif'
  10.   Font.Style = []
  11.   ShowHint = True
  12.   OnCreate = FormCreate
  13.   PixelsPerInch = 120
  14.   TextHeight = 16
  15.   object Image1: TImage
  16.     Left = 10
  17.     Top = 10
  18.     Width = 296
  19.     Height = 159
  20.     Stretch = True
  21.   end
  22.   object Memo1: TMemo
  23.     Left = 10
  24.     Top = 10
  25.     Width = 303
  26.     Height = 139
  27.     Lines.Strings = (
  28.       'Program for testing loading of compressed '
  29.       'resources (see also Selfextr.dpr and '
  30.       'Selfxsml.dpr).'
  31.       ''
  32.       'Before you do ANYTHING, read the comments at '
  33.       'the top of the  BMTESTF.PAS unit in this project.'
  34.       ''
  35.       'Then follow the instructions therein.')
  36.     TabOrder = 2
  37.   end
  38.   object Button1: TButton
  39.     Left = 10
  40.     Top = 177
  41.     Width = 92
  42.     Height = 31
  43.     Hint = 'Creates a compressed bitmap file (do first)'
  44.     Caption = '&Create'
  45.     TabOrder = 0
  46.     OnClick = Button1Click
  47.   end
  48.   object Button2: TButton
  49.     Left = 219
  50.     Top = 177
  51.     Width = 92
  52.     Height = 31
  53.     Hint = 'Don'#39't do this until you'#39've followed instructions #1..#5 in full'
  54.     Caption = '&Load'
  55.     TabOrder = 1
  56.     OnClick = Button2Click
  57.   end
  58.   object MyBitmap: TEdit
  59.     Left = 108
  60.     Top = 177
  61.     Width = 100
  62.     Height = 24
  63.     TabOrder = 3
  64.     Text = 'MyBitmap'
  65.   end
  66.   object Compress1: TCompress
  67.     RegNumber = 0
  68.     MakeDirectories = False
  69.     ExceptionOnFileError = False
  70.     Key = 0
  71.     Left = 112
  72.     Top = 40
  73.   end
  74. end
  75.